package com.frank.framework.aspectj;

import java.util.ArrayList;
import java.util.List;
import org.aspectj.lang.JoinPoint;
import org.aspectj.lang.annotation.Aspect;
import org.aspectj.lang.annotation.Before;
import org.springframework.stereotype.Component;
import com.frank.common.annotation.DataScope;
import com.frank.common.core.context.PermissionContextHolder;
import com.frank.common.core.domain.BaseEntity;
import com.frank.project.system.domain.entity.SysRole;
import com.frank.project.system.domain.entity.SysUser;
import com.frank.common.core.text.Convert;
import com.frank.common.utils.ShiroUtils;
import com.frank.common.utils.StringUtils;

/**
 * 数据过滤处理
 * 
 * @author frank
 */
@Aspect
@Component
public class DataScopeAspect
{
    /**
     * 全部数据权限
     */
    public static final String DATA_SCOPE_ALL = "1";

    /**
     * 自定数据权限
     */
    public static final String DATA_SCOPE_CUSTOM = "2";

    /**
     * 部门数据权限
     */
//    public static final String DATA_SCOPE_DEPT = "3";
//
//    /**
//     * 部门及以下数据权限
//     */
//    public static final String DATA_SCOPE_DEPT_AND_CHILD = "4";
//
//    /**
//     * 仅本人数据权限
//     */
//    public static final String DATA_SCOPE_SELF = "5";

    /**
     * 数据权限过滤关键字
     */
    public static final String DATA_SCOPE = "dataScope";

    @Before("@annotation(controllerDataScope)")
    public void doBefore(JoinPoint point, DataScope controllerDataScope) throws Throwable
    {
        clearDataScope(point);
        handleDataScope(point, controllerDataScope);
    }

    protected void handleDataScope(final JoinPoint joinPoint, DataScope controllerDataScope)
    {
        // 获取当前的用户
        SysUser currentUser = ShiroUtils.getSysUser();
        if (currentUser != null)
        {
            // 如果是超级管理员，则不过滤数据
            if (!currentUser.isAdmin())
            {
                String permission = StringUtils.defaultIfEmpty(controllerDataScope.permission(), PermissionContextHolder.getContext());
                dataScopeFilter(joinPoint, currentUser, controllerDataScope.orgAlias(),
                        controllerDataScope.userAlias(), permission);
            }
        }
    }

    /**
     * 数据范围过滤
     * 
     * @param joinPoint 切点
     * @param user 用户
     * @param orgAlias 部门别名
     * @param userAlias 用户别名
     * @param permission 权限字符
     */
    public static void dataScopeFilter(JoinPoint joinPoint, SysUser user, String orgAlias, String userAlias, String permission)
    {
        StringBuilder sqlString = new StringBuilder();
        List<String> conditions = new ArrayList<String>();
        List<String> scopeCustomIds = new ArrayList<>();
        user.getRoles().forEach(role -> {
            System.out.println(role);
            if (DATA_SCOPE_CUSTOM.equals(role.getDataScope()) && StringUtils.containsAny(role.getPermissions(), Convert.toStrArray(permission)))
            {
                scopeCustomIds.add(Convert.toStr(role.getRoleId()));
            }
        });
        for (SysRole role : user.getRoles())
        {
            String dataScope = role.getDataScope();
            if (!DATA_SCOPE_CUSTOM.equals(dataScope) && conditions.contains(dataScope))
            {
                continue;
            }
            if (StringUtils.isNotEmpty(permission) && StringUtils.isNotEmpty(role.getPermissions())
                    && !StringUtils.containsAny(role.getPermissions(), Convert.toStrArray(permission)))
            {
                continue;
            }
            if (DATA_SCOPE_ALL.equals(dataScope))
            {
                sqlString = new StringBuilder();
                conditions.add(dataScope);
                break;
            }
            else if (DATA_SCOPE_CUSTOM.equals(dataScope))
            {
//                sqlString.append(StringUtils.format(
//                        " OR {}.org_id IN ( SELECT org_id FROM sys_role_org WHERE role_id = {} ) ", orgAlias,
//                        role.getRoleId()));
                if (scopeCustomIds.size() > 1)
                {
                    // 多个自定数据权限使用in查询，避免多次拼接。
//                    sqlString.append(StringUtils.format(" OR {}.dept_id IN ( SELECT dept_id FROM sys_role_dept WHERE role_id in ({}) ) ", deptAlias, String.join(",", scopeCustomIds)));
                    String sql = "";
                    if(userAlias.trim().length() > 0){
                        sql = StringUtils.format(" OR {}org_id in (SELECT org_id FROM sys_role_org WHERE role_id in ({}) ) " ,
                                userAlias, String.join(",", scopeCustomIds));

                    }else if(orgAlias.trim().length() > 0){
                        sql =  StringUtils.format(" OR {}org_id in (SELECT org_id FROM sys_role_org WHERE role_id in ({}) ) " ,
                                orgAlias, String.join(",", scopeCustomIds));
                    }else{
                        sql = StringUtils.format(" AND {}create_dept in (SELECT org_id FROM sys_role_org WHERE role_id in ({}) ) " +
                                        " OR {}create_unit in (SELECT org_id FROM sys_role_org WHERE role_id in ({}) ) ",
                                userAlias, String.join(",", scopeCustomIds),
                                userAlias,String.join(",", scopeCustomIds));
                    }

                    sqlString.append(sql);
                }
                else
                {
//                    sqlString.append(StringUtils.format(" OR {}.dept_id IN ( SELECT dept_id FROM sys_role_dept WHERE role_id = {} ) ", deptAlias, role.getRoleId()));
                    String sql = "";
                    if(userAlias.trim().length() > 0){
                        sql = StringUtils.format(" OR {}org_id in (SELECT org_id FROM sys_role_org WHERE role_id = {} ) " ,
                                userAlias, String.join(",", scopeCustomIds));

                    }else if(orgAlias.trim().length() > 0){
                        sql =  StringUtils.format(" OR {}org_id in (SELECT org_id FROM sys_role_org WHERE role_id = {} ) " ,
                                orgAlias, String.join(",", scopeCustomIds));
                    }else{
                        sql = StringUtils.format(" AND {}create_dept in (SELECT org_id FROM sys_role_org WHERE role_id = {} ) " +
                                        " OR {}create_unit in (SELECT org_id FROM sys_role_org WHERE role_id = {} ) ",
                                userAlias, String.join(",", scopeCustomIds),
                                userAlias,String.join(",", scopeCustomIds));
                    }
                    sqlString.append(sql);
                }
            }
//            else if (DATA_SCOPE_DEPT.equals(dataScope))
//            {
//                sqlString.append(StringUtils.format(" OR {}.org_id = {} ", orgAlias, user.getDeptId()));
//            }
//            else if (DATA_SCOPE_DEPT_AND_CHILD.equals(dataScope))
//            {
//                sqlString.append(StringUtils.format(
//                        " OR {}.org_id IN ( SELECT org_id FROM sys_org WHERE org_id = {} or find_in_set( {} , ancestors ) )",
//                        orgAlias, user.getDeptId(), user.getDeptId()));
//            }
//            else if (DATA_SCOPE_SELF.equals(dataScope))
//            {
//                if (StringUtils.isNotBlank(userAlias))
//                {
//                    sqlString.append(StringUtils.format(" OR {}.user_id = {} ", userAlias, user.getUserId()));
//                }
//                else
//                {
//                    // 数据权限为仅本人且没有userAlias别名不查询任何数据
//                    sqlString.append(StringUtils.format(" OR {}.org_id = 0 ", orgAlias));
//                }
//            }
            conditions.add(dataScope);
        }

        // 多角色情况下，所有角色都不包含传递过来的权限字符，这个时候sqlString也会为空，所以要限制一下,不查询任何数据
        if (StringUtils.isEmpty(conditions))
        {
            sqlString.append(StringUtils.format(" OR {}.org_id = 0 ", orgAlias));
        }

        if (StringUtils.isNotBlank(sqlString.toString()))
        {
            Object params = joinPoint.getArgs()[0];
            if (StringUtils.isNotNull(params) && params instanceof BaseEntity)
            {
                BaseEntity baseEntity = (BaseEntity) params;
                baseEntity.getParams().put(DATA_SCOPE, " AND (" + sqlString.substring(4) + ")");
            }
        }
    }

    /**
     * 拼接权限sql前先清空params.dataScope参数防止注入
     */
    private void clearDataScope(final JoinPoint joinPoint)
    {
        Object params = joinPoint.getArgs()[0];
        if (StringUtils.isNotNull(params) && params instanceof BaseEntity)
        {
            BaseEntity baseEntity = (BaseEntity) params;
            baseEntity.getParams().put(DATA_SCOPE, "");
        }
    }
}
